# Завантаження покетів та набору даних
library(tidyverse)
TMDB <- read_csv("U:/Master's_work_Boiko/Data_Analysis_movie/tmdb_movies.csv")
TMDB
# Кількість зміних і спостережень
dim(TMDB)
## [1] 10866 21
# Імена зміних
names(TMDB)
## [1] "id" "imdb_id" "popularity"
## [4] "budget" "revenue" "original_title"
## [7] "cast" "homepage" "director"
## [10] "tagline" "keywords" "overview"
## [13] "runtime" "genres" "production_companies"
## [16] "release_date" "vote_count" "vote_average"
## [19] "release_year" "budget_adj" "revenue_adj"
# Видалення нерелевантних даних
TMDB_clean <- TMDB %>% select(-c(imdb_id, homepage, tagline, keywords, overview, production_companies, budget_adj, revenue_adj))
TMDB_clean